home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / basic / wprint.zip / WPRINT.DOC next >
Text File  |  1987-12-05  |  3KB  |  64 lines
  1.                                  WPRINT.INC 
  2.                    Copyright (c) 1987 by Unique Software 
  3.                 [an added feature to TBWINDO.INC (required)] 
  4.  
  5.                                    Usage 
  6.                 CALL Wprint(windo%,wcolor%,strng$,no.cr%) 
  7.  
  8.                       Description of passed variables 
  9.  
  10.                                    windo% 
  11.     An integer defining the window to which you want the passed string 
  12. printed. Note that this does NOT have to be the current active window. 
  13. WPRINT allows you to print to ANY window on the screen! Of course if your 
  14. windows overlap, WPRINT will not work properly. If you pass a zero, 0, or a 
  15. value greater than the number of windows on the screen, WPRINT will print 
  16. the string, strng$, to the current active window. 
  17.  
  18.                                   wcolor% 
  19.     An integer defining the foreground color in which the string, strng$, 
  20. will be printed. The background color of the window is ALWAYS used. You can 
  21. pass a value of zero, 0, to use the default colors for the window. 
  22.  
  23.                                    strng$ 
  24.     A string variable holding the string you want to be printed. 
  25.  
  26.                                   no.cr% 
  27.     An integer specifying if you DON't want a <CR> processed after the 
  28. string is printed. This may sound confusing but consider the way a standard 
  29. PRINT statement works. If you want BASIC or TB to NOT generate a <CR> after 
  30. a print statement you ADD a semi-colon to the end of the string. No.cr% 
  31. works this same way. Passing a value OTHER THAN zero, 0, will prevent the 
  32. <CR> from being generated. 
  33.  
  34.  
  35.                           I N S T A L L A T I O N 
  36.  
  37.     Now for the hard part. You have to modify a few of the SUB's within 
  38. TBWINDO.INC for WPRINT to work properly. Here they are in step by step 
  39. fashion. 
  40.  
  41.     (1) At the TOP of the TBWINDO.INC file just after the line which starts 
  42. "dim wrow(mw),..." add the following line:
  43.     dim wcrow(mw),wccol(mw)
  44.     (2) Within "MakeWindow()", just after the line which starts "shared 
  45. wrow()..." add the following line: 
  46.     shared wcrow(),wccol()
  47.     (3) Within "MakeWindow()", just after the line "li=li+1" add the 
  48. following line: 
  49.     wcrow(li)=1 : wccol(li)=1 
  50.     (4) Within "RemoveWindow", just after the line which starts "shared 
  51. wrow()..." add the following lines: 
  52.     shared wcrow(),wccol() 
  53.     wcrow(li)=1 : wccol(li)=1 
  54.     (5) Within "ClearWindow", just after the line which starts "shared 
  55. wrow()..." add the following lines: 
  56.     shared wcrow(),wccol() 
  57.     wcrow(li)=1 : wccol(li)=1 
  58.     (6) Within "WindowXY()", just after the line which starts "shared 
  59. wrow()..." add the following lines: 
  60.     shared wcrow(),wccol() 
  61.     wcrow(li)=row : wccol(li)=col 
  62.     (7) Enjoy WPRINTing all over (but inside) your windows! 
  63.  
  64.